home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2002 January / january_2002.iso / Piposh Special / Piposh / FRITZ1.DXR / 00248.ls < prev    next >
Encoding:
Text File  |  2004-12-06  |  551 b   |  18 lines
  1. on exitFrame
  2.   global mnv, advance, ppl, foes
  3.   set the member of sprite getAt(ppl, 1) to member(1, 2)
  4.   setAt(mnv, 1, 1)
  5.   set the keyDownScript to EMPTY
  6.   set the keyUpScript to "hiplace"
  7.   if advance < 12 then
  8.     foes3(getAt(foes, 1), getAt(ppl, 2))
  9.     foes3(getAt(foes, 2), getAt(ppl, 3))
  10.     foes3(getAt(foes, 3), getAt(ppl, 4))
  11.   end if
  12.   set the constraint of sprite 10 to 0
  13.   set the constraint of sprite 11 to 0
  14.   set the constraint of sprite 12 to 0
  15.   set the constraint of sprite 13 to 0
  16.   set the locV of sprite getAt(ppl, 1) to 198
  17. end
  18.